home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 22 / Cream of the Crop 22.iso / os2 / ext2_200.zip / EXT2_SRC.ZIP / 32BITS / EXT2-OS2 / CASE.C < prev    next >
C/C++ Source or Header  |  1996-09-22  |  2KB  |  65 lines
  1. #ifdef __IBMC__
  2. #pragma strings(readonly)
  3. #endif
  4. //
  5. // $Header: D:/32bits/ext2-os2/RCS/case.c,v 1.1 1996/09/22 23:13:44 Willm Exp Willm $
  6. //
  7.  
  8. // Linux ext2 file system driver for OS/2 2.x and WARP - Allows OS/2 to
  9. // access your Linux ext2fs partitions as normal drive letters.
  10. // Copyright (C) 1995, 1996 Matthieu WILLM
  11. //
  12. // This program is free software; you can redistribute it and/or modify
  13. // it under the terms of the GNU General Public License as published by
  14. // the Free Software Foundation; either version 2 of the License, or
  15. // (at your option) any later version.
  16. //
  17. // This program is distributed in the hope that it will be useful,
  18. // but WITHOUT ANY WARRANTY; without even the implied warranty of
  19. // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20. // GNU General Public License for more details.
  21. //
  22. // You should have received a copy of the GNU General Public License
  23. // along with this program; if not, write to the Free Software
  24. // Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  25.  
  26. #define INCL_DOSERRORS
  27. #define INCL_NOPMAPI
  28. #include <os2.h>                // From the "Developer Connection Device Driver Kit" version 2.0
  29. // #include <fsh.h>
  30.  
  31. #include <os2/types.h>
  32. #include <os2/StackToFlat.h>
  33. #include <os2/fsh32.h>
  34. #include <os2/os2proto.h>
  35. #include <os2/os2misc.h>
  36.  
  37. extern char Case_Retensive;
  38.  
  39. int is_case_retensive(void) {
  40.     int    retval;
  41.     union  fsh32_qsysinfo_parms p;
  42.  
  43.     retval = 0;
  44.     if (Case_Retensive) {
  45.         /*
  46.          * Case retensivity set on the IFS command line
  47.          */
  48.         retval = 1;
  49.     } else {
  50.         /*
  51.          * Case retensivity not set on the IFS command line, then is it a DOS box request ?
  52.          * (DOS box are always case retensive)
  53.          */
  54.         if (fsh32_qsysinfo(2, __StackToFlat(&p)) == NO_ERROR) {
  55.             if (p.process_info.pdb) {
  56.                 retval = 1;
  57.             }
  58.         } else {
  59.             ext2_os2_panic(1, "FSH_QSYSINFO failed");
  60.         }
  61.     }
  62.  
  63.     return retval;
  64. }
  65.